home *** CD-ROM | disk | FTP | other *** search
/ PC World 2002 September / PCWorld_2002-09_cd.bin / Software / Vyzkuste / httrack / httrack-3.20RC4.exe / {app} / src / htsnostatic.c < prev    next >
C/C++ Source or Header  |  2002-07-09  |  6KB  |  259 lines
  1. /* ------------------------------------------------------------ */
  2. /*
  3. HTTrack Website Copier, Offline Browser for Windows and Unix
  4. Copyright (C) Xavier Roche and other contributors
  5.  
  6. This program is free software; you can redistribute it and/or
  7. modify it under the terms of the GNU General Public License
  8. as published by the Free Software Foundation; either version 2
  9. of the License, or any later version.
  10.  
  11. This program is distributed in the hope that it will be useful,
  12. but WITHOUT ANY WARRANTY; without even the implied warranty of
  13. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14. GNU General Public License for more details.
  15.  
  16. You should have received a copy of the GNU General Public License
  17. along with this program; if not, write to the Free Software
  18. Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
  19.  
  20.  
  21. Important notes:
  22.  
  23. - We hereby ask people using this source NOT to use it in purpose of grabbing
  24. emails addresses, or collecting any other private information on persons.
  25. This would disgrace our work, and spoil the many hours we spent on it.
  26.  
  27.  
  28. Please visit our Website: http://www.httrack.com
  29. */
  30.  
  31.  
  32. /* ------------------------------------------------------------ */
  33. /* File: htsnostatic.c subroutines:                             */
  34. /*       thread-safe routines for reentrancy                    */
  35. /* Author: Xavier Roche                                         */
  36. /* ------------------------------------------------------------ */
  37.  
  38. #include "htsnostatic.h"
  39.  
  40. #include "htsbase.h"
  41. #include "htshash.h"
  42.  
  43. typedef struct {
  44.   /*
  45.   inthash values;
  46.   */
  47.   inthash blocks;
  48. } hts_varhash;
  49.  
  50. #if USE_BEGINTHREAD
  51. static PTHREAD_LOCK_TYPE hts_static_Mutex;
  52. #endif
  53. static int hts_static_Mutex_init=0;
  54. #if HTS_WIN
  55. #else
  56. static PTHREAD_KEY_TYPE hts_static_key;
  57. #endif
  58.  
  59. int hts_initvar() {
  60.   if (!hts_static_Mutex_init) {
  61.     /* Init done */
  62.     hts_static_Mutex_init=1;
  63. #if USE_BEGINTHREAD
  64.     /* Init mutex */
  65.     htsSetLock(&hts_static_Mutex, -999);
  66.     
  67. #if HTS_WIN
  68. #else
  69.     /* Init hash */
  70.     PTHREAD_KEY_CREATE(&hts_static_key, hts_destroyvar);
  71. #endif
  72.   }
  73.  
  74.   /* Set specific thread value */
  75. #if HTS_WIN
  76. #else
  77.   {
  78.     void* thread_val;
  79.     hts_varhash* hts_static_hash = (hts_varhash*) malloc(sizeof(hts_static_hash));
  80.     if (!hts_static_hash)
  81.       return 0;
  82.       /*
  83.       hts_static_hash->values = inthash_new(HTS_VAR_MAIN_HASH);
  84.       if (!hts_static_hash->values)
  85.       return 0;
  86.     */
  87.     hts_static_hash->blocks = inthash_new(HTS_VAR_MAIN_HASH);
  88.     if (!hts_static_hash->blocks)
  89.       return 0;
  90.     /* inthash_value_is_malloc(hts_static_hash->values, 0);  */ /* Regular values */
  91.     inthash_value_is_malloc(hts_static_hash->blocks, 1);     /* We'll have to free them upon term! */
  92.     inthash_value_set_free_handler(hts_static_hash->blocks, hts_destroyvar_key);  /* free handler */
  93.     thread_val = (void*) hts_static_hash;
  94.     
  95.     PTHREAD_KEY_SET(hts_static_key, thread_val, inthash);
  96.   }
  97. #endif
  98. #endif
  99.  
  100.   return 1;
  101. }
  102.  
  103. /*
  104.   hash table free handler to free all keys
  105. */
  106. void hts_destroyvar_key(void* adr) {
  107. #if HTS_WIN
  108. #else
  109.   hts_NostaticComplexKey* cKey = (hts_NostaticComplexKey*) adr;
  110.   if (cKey) {
  111.     void* block_address = NULL;
  112.     PTHREAD_KEY_GET(cKey->localKey, &block_address, void*);
  113.     /* Free block */
  114.     if (block_address) {
  115.       free(block_address);
  116.     }
  117.     cKey->localInit = 0;
  118.   }
  119. #endif
  120. }
  121.  
  122. void hts_destroyvar(void* ptrkey) {
  123. #if HTS_WIN
  124. #else
  125.   if (ptrkey) {
  126.     hts_varhash* hashtables = (hts_varhash*) ptrkey;
  127.     PTHREAD_KEY_SET(hts_static_key, NULL, inthash);  /* unregister */
  128.  
  129.     /* Destroy has table */
  130.     inthash_delete(&(hashtables->blocks));  /* will magically call hts_destroyvar_key(), too */
  131.     /*
  132.     inthash_delete(&(hashtables->values));
  133.     */
  134.     free(ptrkey);
  135.   }
  136. #endif
  137. }
  138.  
  139. /*
  140.   destroy all key values (for the current thread)
  141. */
  142. int hts_freevar() {
  143. #if HTS_WIN
  144. #if 0
  145.   void* thread_val = NULL;
  146.   PTHREAD_KEY_GET(hts_static_key, &thread_val, inthash);
  147.   hts_destroyvar(thread_val);
  148.   PTHREAD_KEY_SET(hts_static_key, NULL, inthash);  /* unregister */
  149.   /*
  150.   PTHREAD_KEY_DELETE(hts_static_key); NO
  151.   */
  152. #endif
  153. #endif
  154.   return 1;
  155. }
  156.  
  157. int hts_resetvar() {
  158.   int r;
  159.   hts_lockvar();
  160.   {
  161.     hts_freevar();
  162.     r = hts_initvar();
  163.   }
  164.   hts_unlockvar();
  165.   return r;
  166. }
  167.  
  168. int hts_maylockvar() {
  169.   return hts_static_Mutex_init;
  170. }
  171.  
  172. int hts_lockvar() {
  173. #if USE_BEGINTHREAD
  174.   htsSetLock(&hts_static_Mutex, 1);
  175. #endif
  176.   return 1;
  177. }
  178.  
  179. int hts_unlockvar() {
  180. #if USE_BEGINTHREAD
  181.   htsSetLock(&hts_static_Mutex, 0);
  182. #endif
  183.   return 1;
  184. }
  185.  
  186. int hts_setvar(char* name, long int value) {
  187.   return hts_setextvar(name, (long int)value, 0);
  188. }
  189.  
  190. int hts_setblkvar(char* name, void* value) {
  191.   return hts_setextvar(name, (long int)value, 1);
  192. }
  193.  
  194. int hts_setextvar(char* name, long int value, int flag) {
  195. #if HTS_WIN
  196. #else
  197.   void* thread_val = NULL;
  198.   hts_varhash* hashtables;
  199.   
  200.   /*
  201.   hts_lockvar();   // NO - MUST be protected by caller
  202.   {
  203.   */
  204.   PTHREAD_KEY_GET(hts_static_key, &thread_val, inthash);
  205.   hashtables = (hts_varhash*) thread_val;
  206.   if (hashtables) { // XXc XXC hack for win version
  207.     inthash_write(hashtables->blocks, name, value);
  208.   }
  209. #endif
  210.   
  211.   return 1;
  212. }
  213.  
  214.  
  215. int hts_getvar(char* name, long int* ptrvalue) {
  216.   return hts_getextvar(name, (long int*)ptrvalue, 0);
  217. }
  218.  
  219. int hts_getblkvar(char* name, void** ptrvalue) {
  220.   return hts_getextvar(name, (long int*)ptrvalue, 1);
  221. }
  222.  
  223. int hts_getextvar(char* name, long int* ptrvalue, int flag) {
  224. #if HTS_WIN
  225. #else
  226.   void* thread_val = NULL;
  227.   hts_varhash* hashtables;
  228.   
  229.   hts_lockvar();
  230.   {
  231.     PTHREAD_KEY_GET(hts_static_key, &thread_val, inthash);
  232.     hashtables = (hts_varhash*) thread_val;
  233.     /*  if (flag) {
  234.     */
  235.     inthash_read(hashtables->blocks, name, ptrvalue);
  236.     /*
  237.     } else {
  238.     inthash_read(hashtables->values, name, ptrvalue);
  239.     }
  240.     */
  241.   }
  242.   hts_unlockvar();
  243. #endif
  244.   
  245.   return 1;
  246. }
  247.  
  248. long int hts_directgetvar(char* name) {
  249.   long int value=0;
  250.   hts_getvar(name, &value);
  251.   return value;
  252. }
  253.  
  254. void* hts_directgetblkvar(char* name) {
  255.   void* value=NULL;
  256.   hts_getblkvar(name, &value);
  257.   return value;
  258. }
  259.